JCLStrings.StrSearch ma problem s indexom
Otázka od: Roland Turcan
15. 11. 2002 11:46
Hello delphi-l@clexpert.cz!
function StrSearch(const Substr: AnsiString; const S: AnsiString; const Index:
Integer = 1): Integer;
Tuto funkciu som uz predcasom skusal, a vykazovala chyby. Petr Vones
mi napisal:
> jako mas verzi JCL ? Me to tu funguje spravne.
>
> Petr Vones
Vcera sa to opakovalo, lebo som to potreboval po dlhsom case.
ShowMessageFmt('%d',[JCLStrings.StrSearch('where','select where select where select where',2)]);
skuste toto a vysledok bude pozicia 8 a mal by to byt ukazovatel na
druhy where.
Riesenie JVCL obsahuje celu RxLib a v nej je funkcia NPos, ktora je
identicka so StrSearch z JCL.
--
Best regards, TRoland
http://www.rotursoft.sk
Odpovedá: Karel Kral
15. 11. 2002 13:46
Vyznam pole Index chapes blbe. Neurcuje, ze mas najit druhy 'where' ale
urcuje, od kolikateho znaku se bude hledat. Staci se podivat do helpu.
Roland Turcan wrote:
>
> Hello delphi-l@clexpert.cz!
>
> function StrSearch(const Substr: AnsiString; const S: AnsiString; const
Index: Integer = 1): Integer;
>
> Tuto funkciu som uz predcasom skusal, a vykazovala chyby. Petr Vones
> mi napisal:
> > jako mas verzi JCL ? Me to tu funguje spravne.
> >
> > Petr Vones
>
> Vcera sa to opakovalo, lebo som to potreboval po dlhsom case.
>
>
ShowMessageFmt('%d',[JCLStrings.StrSearch('where','select where select where select where',2)]);
>
> skuste toto a vysledok bude pozicia 8 a mal by to byt ukazovatel na
> druhy where.
>
> Riesenie JVCL obsahuje celu RxLib a v nej je funkcia NPos, ktora je
> identicka so StrSearch z JCL.
>
> --
> Best regards, TRoland
> http://www.rotursoft.sk
--
______________________________________________________
Karel Kral, vedouci odd. IT / IT dep. manager
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 547 235 000, 602 552 432, Fax: 547 231 203
E-Mail: mailto:kral@purus.cz, WWW: http://www.purus.cz
______________________________________________________
Odpovedá: Roland Turcan
15. 11. 2002 15:57
<<< 15. 11. 2002 14:14 - Karel Kral "kralkonf@purus.cz" >>>
KK> Vyznam pole Index chapes blbe. Neurcuje, ze mas najit druhy 'where' ale
KK> urcuje, od kolikateho znaku se bude hledat. Staci se podivat do helpu.
Dakujem za otvorenie oci, clovek sa tak ponahla, ze ani poriadne
necita.
--
Best regards, TRoland
http://www.rotursoft.sk